object FormUsuarios: TFormUsuarios
  Left = 492
  Top = 187
  Width = 600
  Height = 441
  Caption = 'FormUsuarios'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 0
    Top = 0
    Width = 592
    Height = 24
    Align = alTop
    Alignment = taCenter
    Caption = 'Listado de Usuarios'
    Color = clMenuHighlight
    Font.Charset = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -19
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Grid: TXDBGrid
    Left = 0
    Top = 50
    Width = 367
    Height = 364
    Align = alClient
    DataSource = md.dsUsuarios
    FixedStyle = fsNice
    HeaderFont.Charset = DEFAULT_CHARSET
    HeaderFont.Color = clWindowText
    HeaderFont.Height = -11
    HeaderFont.Name = 'MS Sans Serif'
    HeaderFont.Style = []
    ScrollBars = ssNone
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnPaintColumnCell = GridPaintColumnCell
    Columns = <
      item
        Expanded = False
        FieldName = 'ID_USUARIO'
        Title.Caption = 'N'#250'mero'
        Visible = True
        Width = 46
      end
      item
        Expanded = False
        FieldName = 'NOMBRE'
        Title.Caption = 'Nombre'
        Visible = True
        Width = 143
      end
      item
        Expanded = False
        FieldName = 'PERMISOS'
        PickList.Strings = (
          '1'
          '2')
        PickText.Strings = (
          'Comercial'
          'Administrador')
        Title.Caption = 'Permisos'
        Visible = True
        Width = 75
      end
      item
        Expanded = False
        FieldName = 'COMISION'
        Title.Caption = '% Comisi'#243'n'
        Visible = True
        Width = 60
      end>
  end
  object pBotones: TPanel
    Left = 0
    Top = 24
    Width = 592
    Height = 26
    Align = alTop
    TabOrder = 1
    DesignSize = (
      592
      26)
    object BtnSalir: TSpeedButton
      Left = 529
      Top = 1
      Width = 58
      Height = 24
      Anchors = [akTop, akRight, akBottom]
      Caption = 'Cerrar'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
      OnClick = BtnSalirClick
    end
    object BtnNuevo: TSpeedButton
      Left = 0
      Top = 1
      Width = 100
      Height = 24
      Anchors = [akLeft, akTop, akBottom]
      Caption = 'Nuevo'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333FF33333333FF333993333333300033377F3333333777333993333333
        300033F77FFF3333377739999993333333333777777F3333333F399999933333
        33003777777333333377333993333333330033377F3333333377333993333333
        3333333773333333333F333333333333330033333333F33333773333333C3333
        330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
        993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
        333333333337733333FF3333333C333330003333333733333777333333333333
        3000333333333333377733333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = BtnNuevoClick
    end
    object BtnModificar: TSpeedButton
      Left = 100
      Top = 1
      Width = 100
      Height = 24
      Anchors = [akLeft, akTop, akBottom]
      Caption = 'Modificar'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
        000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
        00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
        F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
        0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
        FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
        FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
        0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
        00333377737FFFFF773333303300000003333337337777777333}
      NumGlyphs = 2
      OnClick = BtnModificarClick
    end
    object BtnEliminar: TSpeedButton
      Left = 200
      Top = 1
      Width = 100
      Height = 24
      Anchors = [akLeft, akTop, akBottom]
      Caption = 'Eliminar'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333FF33333333333330003333333333333777333333333333
        300033FFFFFF3333377739999993333333333777777F3333333F399999933333
        3300377777733333337733333333333333003333333333333377333333333333
        3333333333333333333F333333333333330033333F33333333773333C3333333
        330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
        993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
        333333377F33333333FF3333C333333330003333733333333777333333333333
        3000333333333333377733333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = BtnEliminarClick
    end
    object BtnContras: TSpeedButton
      Left = 321
      Top = 1
      Width = 100
      Height = 24
      Anchors = [akLeft, akTop, akBottom]
      Caption = 'Contrase'#241'a'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5000555555555555577755555555555550B0555555555555F7F7555555555550
        00B05555555555577757555555555550B3B05555555555F7F557555555555000
        3B0555555555577755755555555500B3B0555555555577555755555555550B3B
        055555FFFF5F7F5575555700050003B05555577775777557555570BBB00B3B05
        555577555775557555550BBBBBB3B05555557F555555575555550BBBBBBB0555
        55557F55FF557F5555550BB003BB075555557F577F5575F5555577B003BBB055
        555575F7755557F5555550BB33BBB0555555575F555557F555555507BBBB0755
        55555575FFFF7755555555570000755555555557777775555555}
      NumGlyphs = 2
      OnClick = BtnContrasClick
    end
  end
  object Panel1: TPanel
    Left = 367
    Top = 50
    Width = 225
    Height = 364
    Align = alRight
    BevelOuter = bvNone
    Caption = 'pTarifas'
    TabOrder = 2
    object Label2: TLabel
      Left = 0
      Top = 0
      Width = 225
      Height = 23
      Align = alTop
      Alignment = taCenter
      Caption = 'Tarifas aplicadas'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Arial Black'
      Font.Style = []
      ParentFont = False
    end
    object DBNavigator1: TDBNavigator
      Left = 0
      Top = 23
      Width = 225
      Height = 25
      DataSource = dsUsuarios_Tarifas
      VisibleButtons = [nbInsert, nbDelete, nbPost, nbCancel]
      Align = alTop
      Flat = True
      TabOrder = 0
    end
    object GridTarifas: TXDBGrid
      Left = 0
      Top = 48
      Width = 225
      Height = 316
      Align = alClient
      DataSource = dsUsuarios_Tarifas
      FixedStyle = fsFine
      HeaderFont.Charset = DEFAULT_CHARSET
      HeaderFont.Color = clWindowText
      HeaderFont.Height = -11
      HeaderFont.Name = 'MS Sans Serif'
      HeaderFont.Style = []
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'TARIFA'
          ListOptions = [loAutoDropDown, loSelectNextValue, loAllowClearValue]
          PickList.Strings = (
            '0'
            '1'
            '2')
          PickOptions = [poDropDownList, poListItemsOnly, poSelectPickText, poAcceptPickList]
          PickText.Strings = (
            '0'
            '1'
            '2'
            '')
          Title.Caption = 'Tarifa Papel'
          Visible = True
          Width = 60
        end
        item
          Expanded = False
          FieldName = 'PORCENTAJE'
          Title.Caption = 'Porcentaje'
          Visible = True
          Width = 60
        end
        item
          Expanded = False
          FieldName = 'COMISION'
          Title.Caption = 'Comision'
          Visible = True
          Width = 60
        end>
    end
  end
  object dsUsuarios_Tarifas: TDataSource
    DataSet = md.qUsuarios_Tarifas
    Left = 532
    Top = 120
  end
end
